(ns liberator-sample.core.documentation.representations
  (:require [liberator.core :refer [defresource resource]]
            [liberator.representation :refer [as-response]]
            [liberator.dev :refer [wrap-trace]]
            [compojure.core :refer [defroutes ANY]]
            [ring.middleware.params :refer [wrap-params]]
            [org.httpkit.server :as server]
            [clojure.java.io :as io]
            [clojure.data.json :as json])
  (:use clojure.pprint))

(declare x)
(defresource x
             :as-response (fn [d ctx]
                            (-> (as-response d ctx)
                                (assoc-in [:headers "X-FOO"] "Bar")))
             :handle-ok (fn [_] "test"))